home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / internet / net commander 1.0 / ISP / SCRPTLST / ALLIEDAC.CMD < prev    next >
Encoding:
Text File  |  1996-02-14  |  1.4 KB  |  79 lines
  1. #        ALLIED ACCESS, INC. TRUMPET LOGIN.CMD FILE
  2. #
  3. #trace on
  4. #
  5. # set up some strings for dialling up
  6. #
  7. $number = "684-2061"
  8. $username = "your username here"
  9. $password = "your password here"
  10. $modemsetup = "your init string here"
  11. $prompt = ">"
  12. $userprompt = "ogin:"
  13. $passprompt = "assword:"
  14. $slipcmd = "slip"
  15. $addrtarg = "Your address is"
  16. $pppcmd = "ppp"
  17.  
  18. %attempts = 10
  19. #
  20. #
  21. #----------------------------------------------------------
  22. #
  23. # initialize modem
  24. #
  25. output "atz"\13
  26. if ! [input 10 OK\n]
  27.   display "Modem is not responding"\n
  28.   abort
  29. end
  30. #
  31. # setup our modem commands
  32. #
  33. output $modemsetup\13
  34. input 10 OK\n
  35. #
  36. # send phone number
  37. #
  38. %n = 0
  39. repeat
  40.   if %n = %attempts
  41.     display "Too many dial attempts"\n
  42.     abort
  43.   end
  44. # *****************************************************
  45. # * Pour une ligne α pulsion, remplacer atdt par atdp *
  46. # *****************************************************
  47.   output "ATDT "$number\13
  48.   %ok = [input 60 CONNECT]
  49.   %n = %n + 1
  50. until %ok
  51. input 10 \n
  52. #
  53. #  wait till it's safe to send because some modem's hang up
  54. #  if you transmit during the connection phase
  55. #
  56. wait 45 dcd
  57. #
  58. # now prod the terminal server
  59. #
  60. output \13
  61. #
  62. #  wait for the username prompt
  63. #
  64. input 30 $userprompt
  65. sleep 3
  66. output $username\13
  67. #
  68. # and the password
  69. #
  70. input 30 $passprompt
  71. sleep 3
  72. output $password\13
  73. #
  74. # we are now logged in
  75. #
  76. sleep 4
  77. #
  78. # now we are finished.
  79. #